home *** CD-ROM | disk | FTP | other *** search
/ Chip 2003 October / Chip Ekim 2003.iso / prog / desktop / vizeon / setup.exe / AppDir\Vizeon Office\Calculator2.swf / scripts / frame_2 / DoAction.as
Encoding:
Text File  |  2003-08-10  |  549 b   |  21 lines
  1. MyNewName = "Btn" add Number(i + 1);
  2. MyOldName = "Btn" add Number(i);
  3. if(i < 28)
  4. {
  5.    j = 1;
  6.    while(28 >= j)
  7.    {
  8.       duplicateMovieClip(MyOldName,MyNewName,16384 + (Number(i) + 1));
  9.       j++;
  10.    }
  11.    MyOldPos = getProperty(MyOldName, _X);
  12.    setProperty(MyNewName, _X, Number(MyOldpos) + 104);
  13.    set("_root." add MyNewName add ".mytext",MyData[i]);
  14.    if(Number(MyOldPos) + 100 == 480)
  15.    {
  16.       setProperty(MyNewName, _X, 68);
  17.       setProperty(MyNewName, _Y, getProperty(MyOldName, _Y) + 56);
  18.    }
  19. }
  20. i = Number(i) + 1;
  21.